home *** CD-ROM | disk | FTP | other *** search
/ Aminet 15 / Aminet 15 - Nov 1996.iso / Aminet / misc / math / Laplace.lha / Laplace / Data / Projects.lha / physic_PI_22b < prev    next >
Encoding:
Text File  |  1996-06-28  |  553 b   |  41 lines
  1. #LAPLACE
  2. #USEFLOAT=FALSE
  3. #SIMPLIFY=TRUE
  4. #ERRBND=15
  5. #EXPDSP=5
  6. #PREC=8
  7. #F1=f(x)=
  8. #F2=g(x)=
  9. #F3=h(x)=f(x)/g(x)
  10. #F4=matrix(
  11. #F5=vector(
  12. #F6=diff(f)
  13. #F7=diff(g)
  14. #F8=diff(h)
  15. #F9=taylor(f,0)
  16. #F10=taylor(f,1)
  17. #F11=
  18. #F12=
  19. #F13=
  20. #F14=
  21. #F15=
  22. #F16=
  23. #F17=
  24. #F18=
  25. #F19=
  26. #F20=
  27. R_i:=430,dI_i:=0.25e-3,dR_n:=0.11,R_n:=22.6
  28. I(I_i,R_n) = I_i * (R_i/R_n + 1)
  29. eval(I(5,22.6))
  30. dI(I_i)=abs(diff(I,I_i))*dI_i + abs(diff(I,R_n))*dR_n
  31. eval(dI(0.040))
  32. eval(dI(0.060))
  33. eval(dI(0.080))
  34. eval(dI(0.100))
  35. eval(dI(0.120))
  36. eval(dI(0.140))
  37. eval(dI(0.160))
  38. eval(dI(0.180))
  39. eval(dI(0.200))
  40.  
  41.